% GAUTIER LE BIHAN - 2020
% Replication files for "Shocks vs Menu Costs: Patterns of Price Rigidity in an Estimated Multi-Sector Menu-Cost Model?" Review of Economics and Statistics
%
% This code produces Table 5A

clear;
tic

cd ..\..\IRF\VC_mutisector_range
tt=5;
load st_sector1;
%nb sectors

for ii=1:3
    stat=st_sector1(ii).st_sector1;
       for jj=1:4
        nbs=jj*4+1;
        kur=stat(jj,nbs*4+1:nbs*5)
        f=stat(jj,1:nbs)
        x=kur./f
        kf_moy(jj)=mean(x')
       end

mon_indic=[kf_moy]';
kfmoy=2.02333582170536/0.135355442815330
kfmed=[2.52968076965451]/[0.0819746401386794]

ampli=kf_moy./kfmoy;
amplim=kf_moy./kfmed;


mon_indic=[kf_moy;ampli]';
indic(ii).indic=mon_indic;



end